home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d27
/
prtpgm.arc
/
PRTPGM.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1991-12-04
|
2KB
|
32 lines
/* ------------------------------------------------------------- */
/* COMMAND PROGRAM FOR COMMAND DLPGM - DOWN LOAD PGM SOURCE */
/* TO P.C. */
/* ENTERS THE PARMS NEEDED FOR PROCESSING. */
/* DATE: 11-17-86 */
/* WRITTEN BY: DAVID J. WORMELL */
/* Salt Lake City, Utah */
/* */
/* INSTRUCTIONS: LEAVE OUT THE 00 AT THE END OF A LINE NUMBER */
/* EXAMPLE - LINE 20 IS NOT 20.00, IT IS JUST 20 */
/* THIS WILL ALLOW YOU TO PRINT SECTIONS OF */
/* PROGRAMS. */
/* ------------------------------------------------------------- */
CMD PROMPT('PRINT SOURCE CODE')
REQUIRED1: PARM KWD(SRCF) TYPE(*CHAR) LEN(10) MIN(1) +
PROMPT('Source File:' 1)
REQUIRED2: PARM KWD(SRCL) TYPE(*CHAR) LEN(10) +
MIN(1) PROMPT('Library Name:' 2)
REQUIRED3: PARM KWD(SRCM) TYPE(*CHAR) LEN(10) MIN(1) +
PROMPT('Source Member:' 3)
OPTIONAL1: PARM KWD(BGN) TYPE(*DEC) LEN(5) MIN(0) +
PROMPT('Begin stmt number' 4)
OPTIONAL2: PARM KWD(END) TYPE(*DEC) LEN(5) MIN(0) PROMPT('End +
stmt number' 5)
/* ------------------------------------------------------------ */